program Project1; // Zadanie 1.5

{$APPTYPE CONSOLE}

uses
  SysUtils;

const
  a = 37;
  b = 11;

begin
  Writeln('Program oblicza wynik dzielenia calkowitego bez reszty dwoch liczb.');
  Writeln; // wyswietlenie pustej linii
  Writeln('Dla liczb a = ', a, ' i b = ', b);
  Writeln(a, ' div ', b, ' = ', a div b, '.');

  Readln; // czeka na nacisniecie klawisza Enter
end.
